-- card: 23588 from stack: in.03 ะตะตะต -- bmap block id: 3864 -- flags: 0000 -- background id: 2766 -- name: ----- HyperTalk script ----- on openCard send cardOpened to background end openCard on move global direction,trollDead,chase,blasting,causeOfDeath if direction = "east" or direction = "up" or direction = "rear" then go card id 3186 exit move end if if direction = "west" or direction = "down" then put "troll1" into causeOfDeath go to card id 3409 exit move end if pass move end move on closeCard set the cursor to 4 put "" into field 3 end closeCard on take global object,carried -- remember to update carried if you do not pass take pass take end take on drop global object,dropRoom,carried -- remember to update carried if you do not pass take pass drop end drop on use global object,carried,oldRoom,newRoom,useFlag,trollDead,cardID put false into useFlag put last word of object into obj delete first char of obj delete last char of obj if obj="knife" then put "Slash! Hack! Slice!" into field 3 put true into trollDead put "23588" into oldRoom put "24153" into newRoom send roomChange to background put 24153 into cardID go to card id 24153 show card button id 18 of card id 7465 put "You slay the troll with your knife. What a mess." into field 3 exit use end if -- update carried if use results in loss of object pass use end use -- part 16 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=5 top=225 right=261 bottom=39 -- title width / last selected line: 0 -- icon id / first selected line: 9301 / 9301 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: knife ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a knife" into field 3 put false into examFlag end mouseUp -- part 17 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=40 top=226 right=262 bottom=74 -- title width / last selected line: 0 -- icon id / first selected line: 1015 / 1015 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: nodule ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a silicon sphere" into field 3 put false into examFlag end mouseUp -- part 18 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=108 top=226 right=262 bottom=142 -- title width / last selected line: 0 -- icon id / first selected line: 14953 / 14953 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ladder ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a rope ladder" into field 3 put false into examFlag end mouseUp -- part 19 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=176 top=226 right=262 bottom=210 -- title width / last selected line: 0 -- icon id / first selected line: 1019 / 1019 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: bomb ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a time bomb" into field 3 put false into examFlag end mouseUp -- part 20 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=74 top=226 right=262 bottom=108 -- title width / last selected line: 0 -- icon id / first selected line: 24317 / 24317 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: key ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a key" into field 3 put false into examFlag end mouseUp -- part 21 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=142 top=226 right=262 bottom=176 -- title width / last selected line: 0 -- icon id / first selected line: 7012 / 7012 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: gem ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a glowing gem" into field 3 put false into examFlag end mouseUp -- part 36 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=51 top=60 right=219 bottom=182 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp global examFlag,takeFlag,direction,cardID,causeOfDeath if takeFlag then put false into takeFlag put "troll2" into causeOfDeath go to card id 3409 else put "A mean, ugly, Troll." into field 3 put false into examFlag end if end mouseUp -- part contents for background part 25 ----- text ----- Long Stairway (looking west) -- part contents for background part 24 ----- text ----- You are on a stone stairway leading downward to the west and upward to the east. A cool, dank breeze is whistling up the stairs. A large, ugly troll blocks your path, flexing his razor sharp claws. The troll snarls, "Go back, or I shall kill you, puny human!" -- part contents for background part 36 ----- text ----- 1